home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / comm / cil23kit.zip / KITCOLOR.BAT < prev    next >
DOS Batch File  |  1992-10-24  |  5KB  |  221 lines
  1. @ECHO OFF
  2. REM Don't forget to copy this to other BAT if used by SHELL and EXTx.bat.
  3. REM I use this as 2.bat during SHELL and EXTDOWN2.BAT....
  4. CLS
  5. :CHOICE
  6. CALL SETS.BAT
  7. SET EX=%0.BAT
  8. CLS
  9. SET TXHOW=
  10. TYPE SHOWKIT.SCR
  11. REM "ECHO's are followed by ALT 255, a blank"
  12. ECHO  
  13. CIASK Enter your choice : TXHOW
  14. CLS
  15. IF ".%TXHOW%"=="." SET TXHOW=%DP%
  16. FOR %%F IN (0 x X) DO IF '%TXHOW%'=='%%F' GOTO END
  17. REM ═══════════════════════════════
  18. REM Checks for Protocols
  19. REM DSZ/GSZ Checks
  20. FOR %%F IN (z Z) DO IF '%TXHOW%'=='%%F' DSZBOTH.BAT
  21. FOR %%F IN (g G) DO IF '%TXHOW%'=='%%F' ZYMGBOTH.BAT
  22. FOR %%F IN (y Y) DO IF '%TXHOW%'=='%%F' ZYMOBOTH.BAT
  23. FOR %%F IN (f F) DO IF '%TXHOW%'=='%%F' ZXKGBOTH.BAT
  24. FOR %%F IN (q Q) DO IF '%TXHOW%'=='%%F' ZX1KBOTH.BAT
  25. FOR %%F IN (c C) DO IF '%TXHOW%'=='%%F' ZXCRBOTH.BAT
  26. FOR %%F IN (w W) DO IF '%TXHOW%'=='%%F' ZXOTBOTH.BAT
  27. FOR %%F IN (o O) DO IF '%TXHOW%'=='%%F' CALL DSZTERM.BAT
  28. IF .%TXHOW%==.1 GSZBOTH.BAT
  29. IF .%TXHOW%==.2 GYGMBOTH.BAT
  30. IF .%TXHOW%==.3 GYMOBOTH.BAT
  31. IF .%TXHOW%==.4 GXKGBOTH.BAT
  32. IF .%TXHOW%==.5 GX1KBOTH.BAT
  33. IF .%TXHOW%==.6 GXCRBOTH.BAT
  34. IF .%TXHOW%==.7 CALL GSZTERM.BAT
  35. REM Individual Checks
  36. FOR %%F IN (h H) DO IF '%TXHOW%'=='%%F' HSLBOTH.BAT
  37. FOR %%F IN (s S) DO IF '%TXHOW%'=='%%F' SZBOTH.BAT
  38. FOR %%F IN (t T) DO IF '%TXHOW%'=='%%F' TBOTH.BAT
  39. FOR %%F IN (a A) DO IF '%TXHOW%'=='%%F' ZITCBOTH.BAT
  40. FOR %%F IN (b B) DO IF '%TXHOW%'=='%%F' BIMOBOTH.BAT
  41. FOR %%F IN (m M) DO IF '%TXHOW%'=='%%F' MPTBOTH.BAT
  42. FOR %%F IN (d D) DO IF '%TXHOW%'=='%%F' DBOTH.BAT
  43. FOR %%F IN (e E) DO IF '%TXHOW%'=='%%F' EBOTH.BAT
  44. FOR %%F IN (i I) DO IF '%TXHOW%'=='%%F' IBOTH.BAT
  45. FOR %%F IN (j J) DO IF '%TXHOW%'=='%%F' JBOTH.BAT
  46. FOR %%F IN (k K) DO IF '%TXHOW%'=='%%F' TASYBOTH.BAT
  47. FOR %%F IN (l L) DO IF '%TXHOW%'=='%%F' ZMAXBOTH.BAT
  48. FOR %%F IN (n N) DO IF '%TXHOW%'=='%%F' TXZMBOTH.BAT
  49. FOR %%F IN (p P) DO IF '%TXHOW%'=='%%F' CALL TXZMTERM.BAT
  50. FOR %%F IN (r R) DO IF '%TXHOW%'=='%%F' RBOTH.BAT
  51. FOR %%F IN (v V) DO IF '%TXHOW%'=='%%F' VBOTH.BAT
  52. FOR %%F IN (o O 7 p P) DO IF '%TXHOW%'=='%%F' GOTO CHOICE
  53. REM ═════════════
  54. REM Checks for "User Options" "Shells" "Tools"
  55. rem IF .%TXHOW%==.` GOTO REVMARK
  56. IF .%TXHOW%==.+ GOTO HSLSHELL
  57. IF .%TXHOW%==.- GOTO EDITHSL
  58. IF .%TXHOW%==._ GOTO SHOWHSLST
  59. IF ."%TXHOW%"==."'" GOTO HSL2FILES
  60. IF .%TXHOW%==.( GOTO TAGFILES
  61. IF .%TXHOW%==.) CALL USHELL1.BAT
  62. IF .%TXHOW%==.) GOTO CHOICE
  63. FOR %%F IN (u U) DO IF '%TXHOW%'=='%%F' CALL USHELL2.BAT
  64. FOR %%F IN (u U) DO IF '%TXHOW%'=='%%F' GOTO CHOICE
  65. IF .%TXHOW%==.{ GOTO MEMORY
  66. IF .%TXHOW%==.} GOTO MEMTOOL
  67. IF .%TXHOW%==.%;% GOTO FILES2HSL
  68. IF ."%TXHOW%"==."." GOTO SHOWFILES
  69. IF .%TXHOW%==.[ GOTO EDITOR
  70. IF .%TXHOW%==.] GOTO FILEMGR
  71. IF ."%TXHOW%"==."\" GOTO EDITLST
  72. IF ."%TXHOW%"==."/" GOTO QUICKTAG
  73. IF ."%TXHOW%"==."?" CALL HELPKIT.BAT
  74. IF ."%TXHOW%"==."?" GOTO CHOICE
  75. IF ."%TXHOW%"==.""" GOTO ASKDIR
  76. IF ".%TXHOW%"==".~" GOTO SHOWENV
  77. IF ".%TXHOW%"==".!" GOTO EDITEXTBAT
  78. IF ".%TXHOW%"==".@" GOTO EDITSETS
  79. IF .%TXHOW%==.# GOTO #MARK
  80. IF .%TXHOW%==.$ GOTO $MARK
  81. IF ."%TXHOW%"==."%%%" GOTO PCTMARK
  82. IF ."%TXHOW%"==."^" GOTO ^MARK
  83. IF .%TXHOW%==.& GOTO &MARK
  84. IF .%TXHOW%==.* GOTO STARMARK
  85. IF .%TXHOW%==.8 GOTO 8MARK
  86. IF .%TXHOW%==.9 GOTO 9MARK
  87. REM Display message for Unrecognized or Non-supported Command.
  88. CLS
  89. ECHO  
  90. ECHO  
  91. ECHO  
  92. ECHO  
  93. ECHO  
  94. ECHO Command :   %TXHOW%   -  is not supported !
  95. ECHO  
  96. ECHO  
  97. ECHO  
  98. ECHO  
  99. ECHO  
  100. PAUSE
  101. GOTO CHOICE
  102. :ASKDIR
  103. CLS
  104. ECHO  
  105. ECHO                 Direstory Listing for TAGIT
  106. ECHO  
  107. ECHO               Press ALT SPACE to Activate TAGIT
  108. ECHO  
  109. ECHO         C:\UPLOAD or C:\DOCS\*.DOC or C:\FILES\T*.ZIP
  110. ECHO  
  111. ECHO     Default = %UL%\*.*    BLANK= Current Directory
  112. ECHO  
  113. SET TXHOW=%UL%
  114. CIASK Search Path : TXHOW
  115. CLS
  116. DIR %TXHOW% |MORE
  117. PAUSE
  118. GOTO CHOICE
  119. REM ═════════════
  120. REM Tools Section
  121. :MEMORY
  122. MEM /C |MORE
  123. PAUSE
  124. GOTO CHOICE
  125. :MEMTOOL
  126. REM MFT is QEMM Manifest; you can replace as needed
  127. MFT
  128. GOTO CHOICE
  129. :FILES2HSL
  130. IF EXIST %FL% COPY %FL% %HL%
  131. ECHO COPIED %FL% TO %HL%
  132. PAUSE
  133. GOTO CHOICE
  134. :SHOWFILES
  135. TYPE %FL% |MORE
  136. PAUSE
  137. GOTO CHOICE
  138. :EDITOR
  139. %ED%
  140. GOTO CHOICE
  141. :FILEMGR
  142. REM Put file manager here, like Nortom Commander. Watch memory !
  143. ECHO Place File Manager for "]" after :FILEMGR
  144. PAUSE
  145. GOTO CHOICE
  146. :EDITLST
  147. %ED% %FL%
  148. GOTO CHOICE
  149. :QUICKTAG
  150. DIRN.EXE
  151. GOTO CHOICE
  152. REM ══════════════
  153. REM Shells Section
  154. :HSLSHELL
  155. HSLSHELL
  156. GOTO CHOICE
  157. :EDITHSL
  158. %ED% %HL%
  159. GOTO CHOICE
  160. :SHOWHSLST
  161. TYPE HSLSHELL.LST |MORE
  162. PAUSE
  163. GOTO CHOICE
  164. :HSL2FILES
  165. IF EXIST %HL% COPY %HL% %FL%
  166. ECHO COPIED %HL% TO %FL%
  167. PAUSE
  168. GOTO CHOICE
  169. :TAGFILES
  170. TAGFILE
  171. GOTO CHOICE
  172. REM ════════════
  173. REM User Options
  174. :SHOWENV
  175. SET |MORE
  176. PAUSE
  177. GOTO CHOICE
  178. :EDITEXTBAT
  179. EDITORX.BAT 
  180. :EDITSETS
  181. %ED% SETS.BAT
  182. GOTO CHOICE
  183. :#MARK
  184. ECHO Place Command for "#" after :#MARK
  185. PAUSE
  186. GOTO CHOICE
  187. :$MARK
  188. ECHO Place Command for "$" after :$MARK
  189. PAUSE
  190. GOTO CHOICE
  191. :PCTMARK
  192. ECHO Place Command for "%TXHOW%" after :PCTMARK
  193. PAUSE
  194. GOTO CHOICE
  195. :^MARK
  196. ECHO Place Command for "^" after :^MARK
  197. PAUSE
  198. GOTO CHOICE
  199. :&MARK
  200. ECHO Place Command for "&" after :&MARK
  201. PAUSE
  202. GOTO CHOICE
  203. :STARMARK
  204. ECHO Place Command for "*" after :STARMARK
  205. PAUSE
  206. GOTO CHOICE
  207. :8MARK
  208. ECHO Place Command for "8" after :8MARK
  209. PAUSE
  210. GOTO CHOICE
  211. :9MARK
  212. ECHO Place Command for "9" after :9MARK
  213. PAUSE
  214. GOTO CHOICE
  215. :REVMARK
  216. ECHO Place Command for "`" after REVMARK
  217. PAUSE
  218. GOTO CHOICE
  219. GOTO END
  220. :END
  221.